O6011(FINISH ID)
(ABSOLUTE MACRO)
(UNPROVEN)

(FORMAT G65/G66 TCDRZEFS)
(T = #20 - TOOL DIAMETER)
(C = #3 - CUTTER COMP DISTANCE)
(FROM EDGE OF TOOL)
(D = #7 - PART INTERNAL DIAMETER)
(R = #18 - R PLANE)
(E = #8 - END OF ID IN Z)
(F = #9 - FEEDRATE)
(S = #19 SPRING PASSES 3 MAX)
(*********************************)

#103=#5001
#105=#5002
#109=#19
IF[#109GT3.]THEN#109=3.
#113=#105
#115=#105+[[[#7/2.]-[#20/2.]]-#3]
#105=#105+[[#7/2.]-[#20/2.]]
#155=0
#155=#155+[[#7/2.]-[#20/2.]]
G0G90X#103Y#115
Z#18
G1Z#8F50.
G41Y#105F[#9/3.]
WHILE[#119GE0]DO1
IF[#119LT0]GOTO10
#119=#119-1.
G03J-#155Z#106F#9
END1
N10G90G03J-#155
G1G40Y#115
G0Z#18
X#103Y#113
M99
